unit spr_ServiceTraits;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, shbl_Directory, FIBDatabase, pFIBDatabase, ExtCtrls, 
  DB, FIBDataSet, pFIBDataSet, ActnList, Buttons, GridsEh, DBGridEh,
  StdCtrls, ComCtrls, ToolWin, Mask, DBCtrlsEh, PropFilerEh, XLSExportComp,
  PropStorageEh;

type
  TsprServiceTraits = class(TshblDirectory)
    dsReferID: TFIBIntegerField;
    dsReferTRAITNAME: TFIBStringField;
    dsReferCODE: TFIBStringField;
    DBEditEh1: TDBEditEh;
    DBEditEh2: TDBEditEh;
    DBEditEh3: TDBEditEh;
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  sprServiceTraits: TsprServiceTraits;

implementation

{$R *.dfm}

end.
